Chip 2004 September (Special)/Chip-Special_2004-09_Digitalni-Hudba.bin/hudba/earmaster/earpro4setup.exe/{app}/ear40.exe/0/RCDATA/TCHORDEDIT/TCHORDEDIT.txt

Text File | 2003-04-03 | 5KB | 189 lines

object ChordEdit: TChordEdit
  Left = 274
  Top = 280
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = ' '
  ClientHeight = 307
  ClientWidth = 508
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -15
  Font.Name = 'Arial'
  Font.Style = []
  OldCreateOrder = True
  Position = poScreenCenter
  Scaled = False
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 17
  object Bevel1: TBevel
    Left = 2
    Top = 5
    Width = 504
    Height = 264
    Style = bsRaised
  end
  object Label1: TLabel
    Left = 12
    Top = 6
    Width = 43
    Height = 17
    Caption = 'Name:'
    Layout = tlCenter
  end
  object Label2: TLabel
    Left = 12
    Top = 68
    Width = 94
    Height = 17
    Caption = 'Structure in C:'
    Layout = tlCenter
  end
  object Label3: TLabel
    Left = 296
    Top = 53
    Width = 49
    Height = 23
    Alignment = taRightJustify
    AutoSize = False
  end
  object PaintBox1: TPaintBox
    Left = 11
    Top = 90
    Width = 486
    Height = 172
    OnMouseDown = PaintBox1MouseDown
    OnMouseMove = PaintBox1MouseMove
    OnMouseUp = PaintBox1MouseUp
    OnPaint = PaintBox1Paint
  end
  object SpeedButton3: TSpeedButton
    Left = 437
    Top = 61
    Width = 30
    Height = 28
    Hint = 'Add notes'
    GroupIndex = 4
    Down = True
    Glyph.Data = {
      C6000000424DC6000000000000007600000028000000100000000A0000000100
      0400000000005000000000000000000000001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFF00000000
      FFFFFF00000FFF0000FFF00000FFFFF0000F00000FFFFFF0000F00000FFFFFF0
      000000000FFFFFF00000F0000FFFFFF00000F0000FFFFF00000FFF0000FFF000
      00FFFFFF00000000FFFF}
    ParentShowHint = False
    ShowHint = True
    OnClick = SpeedButton3Click
  end
  object SpeedButton6: TSpeedButton
    Left = 467
    Top = 61
    Width = 30
    Height = 28
    Hint = 'Delete notes'
    GroupIndex = 4
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -18
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    Glyph.Data = {
      E6000000424DE60000000000000076000000280000000F0000000E0000000100
      040000000000700000000000000000000000100000001000000000000000BDBD
      BD00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00111111111111
      111000000000111111100FFFFFF0011111100FFFFFF0F011111000000000FF01
      111010FFFFFF0FF01110110FFFFFF0FF01101110FFFFFF0FF01011110FFFFFF0
      FF00111110FFFFFF0F001111110FFFFFF0001111111000000000111111111111
      11101111111111111110}
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    OnClick = SpeedButton6Click
  end
  object SpeedButton1: TSpeedButton
    Left = 436
    Top = 16
    Width = 60
    Height = 43
    Caption = 'Play'
    Glyph.Data = {
      3E010000424D3E010000000000003600000028000000070000000B0000000100
      1800000000000801000000000000000000000000000000000000BFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000BFBFBF000000BFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBF000000BFBFBF000000000000BFBFBFBFBFBFBFBFBFBFBFBF00
      0000BFBFBF000000000000000000BFBFBFBFBFBFBFBFBF000000BFBFBF000000
      000000000000000000BFBFBFBFBFBF000000BFBFBF0000000000000000000000
      00000000BFBFBF000000BFBFBF000000000000000000000000BFBFBFBFBFBF00
      0000BFBFBF000000000000000000BFBFBFBFBFBFBFBFBF000000BFBFBF000000
      000000BFBFBFBFBFBFBFBFBFBFBFBF000000BFBFBF000000BFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBF000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00
      0000}
    Layout = blGlyphTop
    Spacing = 2
    OnClick = SpeedButton1Click
  end
  object Edit1: TEdit
    Left = 12
    Top = 27
    Width = 127
    Height = 25
    TabOrder = 0
    Text = 'Edit1'
  end
  object BitBtn1: TBitBtn
    Left = 298
    Top = 274
    Width = 101
    Height = 29
    Caption = 'OK'
    Default = True
    ModalResult = 1
    TabOrder = 1
    NumGlyphs = 2
  end
  object BitBtn2: TBitBtn
    Left = 403
    Top = 274
    Width = 101
    Height = 29
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 2
    NumGlyphs = 2
  end
  object ComboBox1: TComboBox
    Left = 12
    Top = 27
    Width = 145
    Height = 25
    Style = csDropDownList
    ItemHeight = 17
    TabOrder = 3
    OnChange = ComboBox1Change
  end
  object RadioGroup1: TRadioGroup
    Tag = 2
    Left = 170
    Top = 9
    Width = 260
    Height = 72
    Caption = 'Inversion'
    Columns = 2
    Items.Strings = (
      'Root position'
      '1. inversion'
      '2. inversion'
      '3. inversion')
    TabOrder = 4
    OnClick = ComboBox1Change
  end
end